Свойство CountOfLines.

Возвращает значение типа Long, содержащее число строк программы в программном модуле. Только для чтения.

Пример
В следующем примере свойство CountOfLines используется для определения полного числа строк в указанной области окна программы.

Application.VBE.CodePanes(2).CodeModule.CountOfLines
Hosted by uCoz